#pragma once
#include <iostream>
#include <memory>
#include <string>
#include "Log.hpp"
#include "Socket.hpp"

using namespace socket_ns;

// select 服务器需要正确编写，需要借助一个第三方数组来完成 保存合法的，所有的fd到数组中，方便后续批量化统一添加
class SelectServer
{
    const static int N = sizeof(fd_set) * 8;
    const static int defaultfd = -1;

public:
    SelectServer(int port) : _port(port), _listensock(std::make_unique<TcpSocket>())
    {
        InetAddr addr("0", _port);
        _listensock->BuildListenSocket(addr);
        for (int i = 0; i < N; i++)
        {
            _fd_array[i] = defaultfd;
        }
        _fd_array[0] = _listensock->SockFd();
    }
    void ServerIo(int pos)
    {
        char buffer[1024];
        ssize_t n = ::recv(_fd_array[pos], buffer, sizeof(buffer) - 1, 0);
        if (n > 0)
        {
            buffer[n] = 0;
            std::cout << "client say# " << buffer << std::endl;
            std::string message = "Server Echo# ";
            message += buffer;
            ::send(_fd_array[pos], message.c_str(), message.size(), 0);
        }
        else if (n == 0)
        {
            LOG(DEBUG, "%d is closed\n", _fd_array[pos]);
            ::close(_fd_array[pos]);
            _fd_array[pos] = defaultfd;
            LOG(DEBUG, "curr fd_array[] fd list : %s\n", StrFd().c_str());
        }
        else
        {
            LOG(DEBUG, "%d recv error\n", _fd_array[pos]);
            ::close(_fd_array[pos]);
            _fd_array[pos] = defaultfd;
            LOG(DEBUG, "curr fd_array[] fd list : %s\n", StrFd().c_str());
        }
    }
    void AcceptClient()
    {
        InetAddr clientaddr;
        errno = 0;
        int sockfd = _listensock->Accepter(&clientaddr, &errno); // 这里调用accept 不会阻塞，因为链接等着你accept呢
        if (sockfd < 0)
            return;

        LOG(DEBUG, "Get new link ,sockfd: %d, client info [%s]:[%d]\n", sockfd, clientaddr.IP().c_str(), clientaddr.PORT());

        // read/recv(sockfd), send(sockfd)?? 不能，必须将新的fd，托管select，如何托管给呢？
        // 只要将新的fd添加到辅助数组中即可
        int pos = 1;
        for (; pos < N; pos++)
        {
            if (_fd_array[pos] == defaultfd)
                break;
        }
        if (pos == N)
        {
            ::close(sockfd); // sockfd->close();
            LOG(WARNING, "server is full...\n");
            return;
        }
        else
        {
            _fd_array[pos] = sockfd;
            LOG(DEBUG, "%d add to select array! \n", sockfd);
        }
        LOG(DEBUG, "curr fd_array[] fd list : %s\n", StrFd().c_str());
    }
    void HandlerEvent(fd_set &rfds)
    {
        for (int i = 0; i < N; i++)
        {
            if (_fd_array[i] == defaultfd)
                continue;

            if (FD_ISSET(_fd_array[i], &rfds))
            {
                // 我们只关心读事件就绪了， 而读时间有：listensock 和 nornam sockfd

                if (_fd_array[i] == _listensock->SockFd())
                {
                    AcceptClient();
                }
                else
                {
                    ServerIo(i);
                }
            }
        }
    }

    void Loop()
    {
        while (true)
        {
            // listensocket 等待新连接的到来，等价于对方给我发数据，作为读事件统一处理
            // 新连接到来，等价于，读时间就绪！
            //  首先要将listensock添加到selcet中
            fd_set rfds;
            FD_ZERO(&rfds);

            int max_fd = defaultfd;
            for (int i = 0; i < N; i++)
            {
                if (_fd_array[i] == defaultfd)
                    continue;
                FD_SET(_fd_array[i], &rfds); // 将所有合法文件描述符添加到_fd_array[] 中
                if (max_fd < _fd_array[i])
                {
                    max_fd = _fd_array[i]; // 更新出最大fd
                }
            }

            // struct timeval timeout = {1, 0};
            // select 同时等待的fd， 是有上限的，因为fd_set 是具有的数据类型，有自己的大小；

            // rfds 是一个输入输出型参数，每次调用，都要堆rfds进行重新设定！

            int n = select(max_fd + 1, &rfds, nullptr, nullptr, /*&timeout*/ nullptr);
            switch (n)
            {
            case 0:
                // LOG(INFO, "timeout ....[ %d ]:[ %d ]\n", timeout.tv_sec, timeout.tv_usec);
                LOG(INFO, "timeout ....\n");
                break;
            case -1:
                LOG(ERROR, "select serror ....\n");
                break;
            default:
                LOG(DEBUG, "Event Happen! ....[ %d ]\n", n); // 底层有一个事件就绪，select 为什么会一直通知我，因为我们没有处理
                HandlerEvent(rfds);
                break;
            }
        }
    }

    std::string StrFd()
    {
        std::string fdstr;
        for (int i = 0; i < N; i++)
        {
            if (_fd_array[i] == defaultfd)
                continue;
            fdstr += std::to_string(_fd_array[i]);
            fdstr += " ";
        }
        return fdstr;
    }

    ~SelectServer()
    {
    }

private:
    uint32_t _port;
    std::unique_ptr<Socket> _listensock;
    int _fd_array[N]; // 辅助数组
};
